home *** CD-ROM | disk | FTP | other *** search
- on(release){
- set("_level40/sound/lib:sound","175");
- call("_level40/sound/lib:play");
- set("../:month",int(_name.substr("6","2")));
- x = "1";
- while("12" >= x)
- {
- if(x < "10")
- {
- myMonth = "0" add x;
- }
- else
- {
- myMonth = x;
- }
- tellTarget("../month" add myMonth)
- {
- setProperty("selectedMonth", _visible, "0");
- }
- tellTarget("../month" add myMonth add "/colourlabel")
- {
- gotoAndStop("black");
- }
- x += "1";
- }
- setProperty("selectedMonth", _visible, "1");
- tellTarget("colourlabel")
- {
- gotoAndStop(eval("_level0/data:labelcolour"));
- }
- myMonth = _name.substr("6","2");
- if(getProperty("../", _name).substr("9","5") eq "start" and eval("../:year") >= eval("../../:endyear"))
- {
- set("../:year",eval("../../:endyear"));
- if(int(eval("../../:endMonth")) < int(eval("../:month")))
- {
- myMonth = eval("../../:endMonth");
- }
- else
- {
- myMonth = _name.substr("6","2");
- }
- }
- else if(getProperty("../", _name).substr("9","5") eq "end" and eval("../../:startyear") >= eval("../:year"))
- {
- set("../:year",eval("../../:startyear"));
- if(eval("../:month") < eval("../../:startMonth"))
- {
- myMonth = eval("../../:startMonth");
- }
- else
- {
- myMonth = _name.substr("6","2");
- }
- }
- set("../../:" add getProperty("../", _name).substr("9","5") add "month",myMonth);
- set("../../:" add getProperty("../", _name).substr("9","5") add "year",eval("../:year"));
- tellTarget("../")
- {
- gotoAndStop("hide");
- }
- }
-